#!/usr/bin/perl

print $ARGV[0],"\n";
$t = gmtime(time);
print "$t \" ";
print "\n";